global d_user "Your Directory" //Set the directory :)
set more off

/******************************************************************************/
/*                 School Breakfast and Academic Achievement                  */
/*                Published in Economics of Education Review                  */
/*                 Cuadros-Menaca, Thomsen and Nayga (2022)                   */
/******************************************************************************/

// Fig. 1. Arkansas schools offering BAB.

use "$d_user\Breakfast.dta", clear
gen one=1
egen Total_Schools=total(one), by(bmi_year)
bys bmi_year : keep if _n==1 
rename bmi_year Year
twoway (bar Total_Schools Year, fcolor(white) lcolor(black) graphregion(color(white)) ///
        ytitle("Number of Schools") xlabel(#11) xtitle("Year"))
